﻿Namespace Grade

    Public Class GradeScheme

        Private _Id As Long
        Public Property Id() As Long
            Get
                Return _Id
            End Get
            Set(ByVal value As Long)
                _Id = value
            End Set
        End Property

        Private _Name As String
        Public Property Name() As String
            Get
                Return _Name
            End Get
            Set(ByVal value As String)
                _Name = value
            End Set
        End Property

        Private _ShortName As String
        Public Property ShortName() As String
            Get
                Return _ShortName
            End Get
            Set(ByVal value As String)
                _ShortName = value
            End Set
        End Property

        Private _Ranges As List(Of GradeSchemeRange)
        Public Property Ranges() As List(Of GradeSchemeRange)
            Get
                Return _Ranges
            End Get
            Set(ByVal value As List(Of GradeSchemeRange))
                _Ranges = value
            End Set
        End Property

    End Class

End Namespace